function ans=f2(t,T)
	global k;

	ans=k*(Tout(t)-T)+u(T);
end


function ans=u(T)
	global TD;

	ans=0;
	if(T<TD)
		ans=4;
	else if(T>TD+1)
		ans=-1;
	end
end


